home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 98 / Skunkware 98.iso / src / interp / perl5.005.tar.gz / perl5.005.tar / perl5.005 / Porting / findvars < prev    next >
Text File  |  1998-07-21  |  4KB  |  374 lines

  1. #!/l/local/bin/perl -w
  2.  
  3. $pat = '';
  4. # construct word list
  5. while (<DATA>) {
  6.   chomp;
  7.   next unless $_;
  8.   $pat .= "$_|";
  9. }
  10. chop $pat if $pat =~ /\|$/;
  11.  
  12. # grep
  13. while (<>) {
  14.     if (/^(.*?)\b($pat)\b(.*)$/o) {
  15.         my $head = "$1#$2#";
  16.         $_ = $3;
  17.         while (/^(.*?)\b($pat)\b(.*)$/o) {
  18.             $head .= "$1#$2#";
  19.             $_ = $3;
  20.         }
  21.     print "$ARGV\:$.\:$head$_\n";
  22.     }
  23. }
  24. continue {
  25.     close ARGV if eof;
  26. }
  27. __END__
  28. Argv
  29. Cmd
  30. DBcv
  31. DBgv
  32. DBline
  33. DBsignal
  34. DBsingle
  35. DBsub
  36. DBtrace
  37. No
  38. Sv
  39. Xpv
  40. Yes
  41. amagic_generation
  42. ampergv
  43. an
  44. archpat_auto
  45. argvgv
  46. argvoutgv
  47. av_fetch_sv
  48. basetime
  49. beginav
  50. bodytarget
  51. bostr
  52. bufend
  53. bufptr
  54. cddir
  55. chopset
  56. collation_ix
  57. collation_name
  58. collation_standard
  59. collxfrm_base
  60. collxfrm_mult
  61. colors
  62. colorset
  63. compcv
  64. compiling
  65. comppad
  66. comppad_name
  67. comppad_name_fill
  68. comppad_name_floor
  69. cop_seqmax
  70. copline
  71. cryptseen
  72. cshlen
  73. cshname
  74. curcop
  75. curcopdb
  76. curinterp
  77. curpad
  78. curpm
  79. curstack
  80. curstackinfo
  81. curstash
  82. curstname
  83. curthr
  84. dbargs
  85. debdelim
  86. debname
  87. debstash
  88. debug
  89. defgv
  90. defoutgv
  91. defstash
  92. delaymagic
  93. diehook
  94. dirty
  95. dlevel
  96. dlmax
  97. do_undump
  98. doextract
  99. doswitches
  100. dowarn
  101. dumplvl
  102. e_script
  103. egid
  104. endav
  105. envgv
  106. errgv
  107. error_count
  108. euid
  109. eval_cond
  110. eval_mutex
  111. eval_owner
  112. eval_root
  113. eval_start
  114. evalseq
  115. exitlist
  116. exitlistlen
  117. expect
  118. extralen
  119. fdpid
  120. filemode
  121. firstgv
  122. forkprocess
  123. formfeed
  124. formtarget
  125. generation
  126. gensym
  127. gid
  128. globalstash
  129. he_root
  130. hexdigit
  131. hintgv
  132. hints
  133. hv_fetch_ent_mh
  134. hv_fetch_sv
  135. in_clean_all
  136. in_clean_objs
  137. in_eval
  138. in_my
  139. in_my_stash
  140. incgv
  141. initav
  142. inplace
  143. last_in_gv
  144. last_lop
  145. last_lop_op
  146. last_proto
  147. last_uni
  148. lastfd
  149. lastgotoprobe
  150. lastscream
  151. lastsize
  152. lastspbase
  153. laststatval
  154. laststype
  155. leftgv
  156. lex_brackets
  157. lex_brackstack
  158. lex_casemods
  159. lex_casestack
  160. lex_defer
  161. lex_dojoin
  162. lex_expect
  163. lex_fakebrack
  164. lex_formbrack
  165. lex_inpat
  166. lex_inwhat
  167. lex_op
  168. lex_repl
  169. lex_starts
  170. lex_state
  171. lex_stuff
  172. lineary
  173. linestart
  174. linestr
  175. localizing
  176. localpatches
  177. main_cv
  178. main_root
  179. main_start
  180. mainstack
  181. malloc_mutex
  182. markstack
  183. markstack_max
  184. markstack_ptr
  185. max_intro_pending
  186. maxo
  187. maxscream
  188. maxsysfd
  189. mess_sv
  190. min_intro_pending
  191. minus_F
  192. minus_a
  193. minus_c
  194. minus_l
  195. minus_n
  196. minus_p
  197. modcount
  198. modglobal
  199. multi_close
  200. multi_end
  201. multi_open
  202. multi_start
  203. multiline
  204. mystrk
  205. na
  206. nexttoke
  207. nexttype
  208. nextval
  209. nice_chunk
  210. nice_chunk_size
  211. ninterps
  212. nomemok
  213. nrs
  214. nthreads
  215. nthreads_cond
  216. numeric_local
  217. numeric_name
  218. numeric_standard
  219. ofmt
  220. ofs
  221. ofslen
  222. oldbufptr
  223. oldlastpm
  224. oldname
  225. oldoldbufptr
  226. op
  227. op_mask
  228. op_seqmax
  229. opsave
  230. origalen
  231. origargc
  232. origargv
  233. origenviron
  234. origfilename
  235. ors
  236. orslen
  237. osname
  238. pad_reset_pending
  239. padix
  240. padix_floor
  241. parsehook
  242. patchlevel
  243. patleave
  244. pending_ident
  245. perl_destruct_level
  246. perldb
  247. pidstatus
  248. preambleav
  249. preambled
  250. preprocess
  251. profiledata
  252. reg_eval_set
  253. reg_flags
  254. reg_start_tmp
  255. reg_start_tmpl
  256. regbol
  257. regcc
  258. regcode
  259. regcomp_parse
  260. regcomp_rx
  261. regcompp
  262. regdata
  263. regdummy
  264. regendp
  265. regeol
  266. regexecp
  267. regflags
  268. regindent
  269. reginput
  270. reginterp_cnt
  271. reglastparen
  272. regnarrate
  273. regnaughty
  274. regnpar
  275. regprecomp
  276. regprev
  277. regprogram
  278. regsawback
  279. regseen
  280. regsize
  281. regstartp
  282. regtill
  283. regxend
  284. replgv
  285. restartop
  286. retstack
  287. retstack_ix
  288. retstack_max
  289. rightgv
  290. rs
  291. rsfp
  292. rsfp_filters
  293. runops
  294. savestack
  295. savestack_ix
  296. savestack_max
  297. sawampersand
  298. sawstudy
  299. sawvec
  300. scopestack
  301. scopestack_ix
  302. scopestack_max
  303. screamfirst
  304. screamnext
  305. secondgv
  306. seen_evals
  307. seen_zerolen
  308. sh_path
  309. siggv
  310. sighandlerp
  311. sortcop
  312. sortcxix
  313. sortstash
  314. specialsv_list
  315. splitstr
  316. stack_base
  317. stack_max
  318. stack_sp
  319. start_env
  320. statbuf
  321. statcache
  322. statgv
  323. statname
  324. statusvalue
  325. statusvalue_vms
  326. stdingv
  327. strchop
  328. strtab
  329. sub_generation
  330. sublex_info
  331. subline
  332. subname
  333. sv_arenaroot
  334. sv_count
  335. sv_mutex
  336. sv_no
  337. sv_objcount
  338. sv_root
  339. sv_undef
  340. sv_yes
  341. svref_mutex
  342. sys_intern
  343. tainted
  344. tainting
  345. thisexpr
  346. thr_key
  347. threadnum
  348. threads_mutex
  349. threadsv_names
  350. thrsv
  351. timesbuf
  352. tmps_floor
  353. tmps_ix
  354. tmps_max
  355. tmps_stack
  356. tokenbuf
  357. top_env
  358. toptarget
  359. uid
  360. unsafe
  361. warnhook
  362. xiv_arenaroot
  363. xiv_root
  364. xnv_root
  365. xpv_root
  366. xrv_root
  367. piMem
  368. piENV
  369. piStdIO
  370. piLIO
  371. piDir
  372. piSock
  373. piProc
  374.